Login-Last-Seen names an undocumented function, with lambda list (OBJECT).
(SETF Login-Last-Seen) names an undocumented function, with lambda list (NEW-VALUE OBJECT).